﻿Public Class HoaDonBUS
    Public Function GetHoaDon() As DataTable
        Dim hd As New HoaDonDAO
        Return hd.GetHoaDon()
    End Function

    Public Sub AddHoaDon(ByVal newHD As HoaDonDTO)
        Dim hd As New HoaDonDAO
        hd.AddHoaDon(newHD)
    End Sub

    Public Sub DelHoaDon(ByVal delHD As HoaDonDTO)
        Dim hd As New HoaDonDAO
        hd.DelHoaDon(delHD)
    End Sub

    Public Sub UpdateHoaDon(ByVal newHD As HoaDonDTO)
        Dim hd As New HoaDonDAO
        hd.UpdateHoaDon(newHD)
    End Sub
    Public Shared Function Get_DSHD()
        Dim hd As New HoaDonDAO
        Dim dt As DataTable
        dt = New DataTable()
        dt = hd.GetHoaDon()
        Return dt
    End Function
End Class
